home *** CD-ROM | disk | FTP | other *** search

---

/ Amiga Format CD 46 / Amiga Format CD46 (1999-10-20)(Future Publishing)(GB)[!][issue 1999-12].iso / -in_the_mag- / reader_requests / scilab / doc / lmitool / fig8.eps (.svg)

< prev

next >

Encapsulated PostScript  |  1999-09-16  |  26KB  |  424x779  |  8-bit (243 colors)

Labels: text | screenshot | number | document
OCR: Scilab Dialog Panel Function definitions Here is a skeleton of the functions which you shoud edit You can do the editing in this window or click on 'ok', save the skeleton and edit later using your favorite editor function [L,X,gamma]=MM_estim(H,V) // Generated by Imitool on Wed Feb 08 09:45:01 MET 1995 Mbound = 1e3; abstol 1e-10; nu = 10; maxiters = 100; reltol = 1e-10; options=[Mbound, abstol,nu, maxiters,reltol]; ///////////DEFINE INITIAL GUESS BELOW L_init-zeros(H(1))' X_init=list() for i=1:size(H) X_init(i)=zeros(H(1) '*H(1)) end gamma_init=0 XLISTO=list (L_init,X_init,gamma_init) XLIST=1misolver (XLISTO, MM_estim_eval,options) [L,X,gamma]=XLIST(:) //////EVALUATION FUNCTION///// function [LME,LMI,OBJ]=MM_estim_eval(XLIST) [L,X,gamma]=XLIST(:) //////DEFINE LME, LMI and OBJ BELOW [n,m]=size(H(1)) LME1=list();LME2=list();LMI1=list();LMI2=list() for i=1:size(H) LME1(i)=eye-L*H(1) LME2(1)=X(1)-X(i)' LMI1(i)=[eye(n,n),V(1)´L´;L*V(1),X(1)] LMI2(1)=gamma-trace(x(i)) end LME=list (LME1,LME2) LMI=list (LMI1,LMI2) OBJ=gamma Ok Cancel

---